home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nautilus 1994 August
/
Nautilus CD Magazine Volume 4-8 August 1994 Windows Edition.mdf
/
setup
/
nautcd
/
metatec.sbk
(
.txt
)
< prev
next >
Wrap
Asymetrix ToolBook File
|
1994-08-12
|
51KB
|
684 lines
WaitStatus
WaitStatus
ListBoxDlg
EditList
ListBoxDlg
keyDown
OKButton
CancelButton
keyUp
ListBox
in,ms
ThreeDeeRect
bottomLine
topLine
ListBox
OKButton
buttonDoubleClick
center
topLeft
topRight
bottomRight
bottomLeft
OKButton
+*+.0>
stSelectedItems
objListBox
buttonClick
CancelButton
stSelectedItems
buttonClick
Cancel
PromptText
Media Type for New Item:low
CancelButton
stSelectedItems
buttonClick
buttonClick
4stack stSelectedItems
close targetWindow
Cancel
PromptText
Media Type for New Item:low
EditList
OKButton
buttonClick
CancelButton
buttonClick
Cancel
EditList
ListBox
OKButton
CancelButton
keyUp
EditControl
buttonClick
Selection Number One
Selection Numero Dos
The Indescribably Fabulous Selection Number Three
Boring Old Number Fourrrrrrumber Four
EditControl
ListBox
CancelButton
keyUp
OKButton
keyChar
The Indescribably Fabulous Selection Number Three ber Three
OKButton
keyChar
buttonClick
B"CancelButton"
(selectedTextLines
"ListBox")
z = keyEnter
B"OKButton"
The Indescribably Fabulous Selection Number Three ber Three
WaitStatus
OKButton
WaitStatus
WaitStatus
Getting media properties. One moment please...
Generic System Book
Contents Copyright(c) 1994, Metatec Corp.
DriveListViewer
Page id 2
tools
Page id 4
Tools
Reader
Open &Tools Window
closeWindow
Window
~= Reader
"Open &Tools
WaitStatus
Page "WaitStatus"
EditList
sting 1,2,3
page "EditList"
EditControl
openWindow
Window
"EditControl"
sting 1,2,3
ListBoxDlg
ge "EditList"
stbox Dialog
Media Position
istbox Dialog
Dan's Fabulous List Editing Dialog
"EditControl"
page "ListBoxDlg"
%"?h
System
HxuJlxA
Arial
Arial
ncdVGA
initMetatec
linkWinFunctions
linkDLL kernel
WritePrivateProfileString(
GetPrivateProfileString(
GetPrivateProfileInt(
GetProfileString(
gGetModuleHandle(
GetModuleFileName(
WinOpenFile =
gGetWindowsDirectory(
gSetErrorMode(
gGlobalAlloc(
GlobalLock(
GlobalUnlock(
gGlobalFree(
GlobalCompact(
GetFreeSpace(
Yield()
WinHelpContext =
WinHelpKey =
gFindWindowByClass =
gFindWindowByCaption =
ShowWindow(
SetWindowPos(
BringWindowToTop(
gSetTimer(
KillTimer(
PeekMessage(
SendMessage(
gGetDesktopWindow()
gGetFreeSystemResources(
GetSystemMetrics(
gGetDC(
ReleaseDC(
gSetCapture(
ReleaseCapture(
AddFontResource(
RemoveFontResource(
GetTextMetrics(
SetMapMode(
sysInfo
szSysInfo,szTemp
dwFree
%"##,###,###"
J = \
Memory
F:" &&
\ && "Bytes" &
"User
o:" &&
0x0001) & "%" &
"GDI
:" &&
0x0002) & "%"
myPath
= "\"
iniString iniFile,section,entry,default,bufSize
szRetVal
ghMem,wBufSize
Zstack lpBuf
xisType("
6 = 256
globalMem(
freeGlobalMem(
iniInt
writeIniItem
ry,str
nRetVal
$ <> 0)
profileString
dwBufSize
( = 256
lpMem =
isFile szFileSpec
nFoundIt
OFSTRUCT,lpFileSpec
gwMode,
lpOFSTRUCT =
,139)
0x8000 bitOr 0
= SEM_NOOPENFILEERRORBOX; 0
= SEM_NOCRITICALERRORBOX
, 0x4000)
= OF_EXIST
<> -1)
isBook szBookName
Zlogical bSysSuspend
isObject(
help szHelpFile,dwContext,szKeyVal
lpHelpFile =
(windowHandle
|,0x0101,
"Unable
"Cannot find
" &&
fileOnly
= "\"
upperCase(
V(i + 1)
pathOnly
i =
<> "\"
i > 0
i > 0
baseName
~(".",
) = 0
~(".",
) - 1)
fileExtension
~(".",
) = 0
~(".",
) + 1)
dwSize
retVal
Flags
wFlags = 0x0100
x0040
-- *** GMEM_MOVEABLE | GMEM_DISCARDABLE | GMEM_ZEROINIT *** --
--
-- Check
a value
zero
only,
--
point)
--
-- Pop
calling handler
needed
Remaining
form: <descriptor>,<
compactBook
szOrig,
".bak"
~(".",
-- just
backup?"
f"Yes"
"tb30dos.dll"
removeFile(
screenResolution
ptScreenRes
waitStatus szWaitText
isOpen
"WaitStatus"
close
editList szCaption,szList,wSelectedItem
\i,lListSize
gwMaxChars,wMargin
I = 0
R = 1
"ListBox"
"EditList"
"EditControl"
selectedTextLines
aveCharWidth(
targetWindow)) + \
2) *
sysPageUnitsPerPixel)
rSide
B"CancelButton" =
B"OKButton" = lSide(
5) - 30
translateWindowMessage
on 0x0112
WM_SYSCOMMAND
bOK =
%modal
listBoxDlg
Prompt,stList,stSelected
stSelectedItems
{objListBoxGroup,
,objPromptText
dwTextWidth
sysSuspendMessages =
"ListBoxDlg"
(szPrompt))
) > 1
fieldType
= multiSelect
= singleSelect
2) *
) - 30
on 0
flushMessageQueue() -- *** In
Mdlg was invoked
Ha keypress
<Enter>
*** --
-- *** Set
either
*** --
defaultAllowDrop
szDir
,255)
szIdleCmds[]
szCopy[],szCmd
dimensions(
-) > 0
deleteStringMember
reset
hwnd,wMsg,wParam,lParamLo,lParamHi
$ = 0xF060
buttonClick
ghdc,
tmAveCharWidth
V6) -- *** MM_TWIPS *** --
.(10,
tbkTextMetrics
szMetrics
ghDC,
K6) -- ***
.(i * 2,
.(25,
.(27,
.(29,
array ar[],
Hreference,wItem
gwHighMark
@ - 1)
arCopy[i] = ar[i]
- 1)
- 1)
O + 1]
deleteDwordMember
"" -- ***
znothing trap *** --
- 1)
- 1)
- 1)
+ 1]
deleteStackMember
"" -- ***
- 1)
- 1)
- 1)
+ 1]
insertStringMember
,newVal
gwNewHighMark
ar) + 1)
- 1]
- 1)
insertDwordMember
ar) + 1)
- 1]
- 1)
insertStackMember
ar) + 1)
- 1]
- 1)
newLSide
newRSide
- width(
removeUnreferencedBitmaps
szResources
= resourceList("
O) = 0
statusBar = "Removing bitmap #" && i && "
" &&
" && (
) & ". Continuing..."
Done"
;Fc^;
linkWinFunctions
initMetatec
AddFontResource
RemoveFontResource
GetTextMetrics
SetMapMode
WritePrivateProfileString
GetPrivateProfileString
GetPrivateProfileInt
GetProfileString
GetModuleHandle
GetModuleFileName
OpenFile
WinOpenFile
GetWindowsDirectory
SetErrorMode
GlobalAlloc
GlobalLock
GlobalUnlock
GlobalFree
GlobalCompact
GetFreeSpace
Yield
WinHelp
WinHelpContext
WinHelp
WinHelpKey
FindWindow
FindWindowByClass
FindWindow
FindWindowByCaption
ShowWindow
SetWindowPos
BringWindowToTop
SetTimer
KillTimer
PeekMessage
SendMessage
GetDesktopWindow
GetFreeSystemResources
GetSystemMetrics
GetDC
ReleaseDC
SetCapture
ReleaseCapture
kernel
linkWinFunctions
.&+ h
w, #?
w, #?
GetFreeSpace
System Memory Free:
GetFreeSystemResources
User Resources Free:
GDI Resources Free:
##,###,###
Bytes
sysInfo
myPath
.freeGlobalMem
(GetPrivateProfileString
globalMem
iniString
GetPrivateProfileInt
iniInt
WritePrivateProfileString
writeIniItem
GetProfileString
.freeGlobalMem
globalMem
profileString
-SetErrorMode
.freeGlobalMem
WinOpenFile
globalMem
isFile
isBook
.freeGlobalMem
Cannot find help file
WinHelpKey
isFile
WinHelpContext
globalMem
Unable to run Help!
1, #b
fileOnly
pathOnly
1, #b
EofileOnly
baseName
1, #b
fileExtension
GlobalAlloc
GlobalFree
GlobalLock
globalMem
GlobalUnlock
false
GlobalFree
freeGlobalMem
removeFile
tb30dos.dll
Remove backup?
removeFile
compactBook
GetSystemMetrics
screenResolution
.&+ +E
WaitStatus
default
waitStatus
1, "Q
ListBox
EditControl
OKButton
CancelButton
rSide
aveCharWidth
EditList
rSide
GetSystemMetrics
WM_SYSCOMMAND
lSide
editList
+*+.0
1, "Q
.&, 7
.&, 7
ListBox
PromptText
ListBoxDlg
OKButton
CancelButton
objPromptText
objListBoxGroup
rSide
aveCharWidth
rSide
GetSystemMetrics
WM_SYSCOMMAND
stSelectedItems
objListBox
lSide
listBoxDlg
.freeGlobalMem
globalMem
Y}GetWindowsDirectory
WindowsDir
szIdleCmds
szCopy
szCmd
J$deleteStringMember
szIdleCmds
CancelButton
WWM_SYSCOMMAND
WM_SYSCOMMAND
GetTextMetrics
.freeGlobalMem
}ReleaseDC
GetDC
SetMapMode
globalMem
aveCharWidth
GetTextMetrics
.freeGlobalMem
}ReleaseDC
GetDC
SetMapMode
globalMem
tbkTextMetrics
deleteStringMember
deleteDwordMember
deleteStackMember
insertStringMember
insertDwordMember
insertStackMember
lSide
rSide
lSide
width
rSide
width
-#, #?
-$, #?
1, #?
Removing bitmap #
Cannot remove
. Continuing...
statusBar
removeUnreferencedBitmaps
&File
&Open... Ctrl+O
&Save Ctrl+S
Save &As...
saveas
&Import...
import
&Export...
export
Print Set&up...
printsetup
&Print Pages... Ctrl+P
printpages
Prin&t Report...
printreport
Send &Mail...
sendmail
&Run...
E&xit Alt+F4
&Edit
&Undo Ctrl+Z
Cu&t Ctrl+X
&Copy Ctrl+C
&Paste Ctrl+V
paste
C&lear Del
clear
Select &All Shift+F9
selectall
Select Pa&ge Shift+F12
selectpage
&Size to Page F11
sizetopage
F&ind... F5
search
Re&place...
replace
A&uthor F3
author
&Text
&Character... F6
character
&Paragraph... F7
paragraph
&Regular Ctrl+Space
regular
&Bold Ctrl+B
&Italic Ctrl+I
italic
&Underline Ctrl+U
underline
Stri&keout Ctrl+K
strikeout
Superscrip&t/Subscript
super/subscript
&Normal Script
normalscript
Su&bscript Ctrl+L
subscript
Su&perscript Ctrl+Shift+L
superscript
&Show Hotwords F9
showhotwords
&Page
&Next Alt+Right
&Previous Alt+Left
previous
&First Alt+Up
first
&Last Alt+Down
&Back Shift+F2
&History... Ctrl+F2
history
N&ew Page Ctrl+N
newpage
&Help
&Contents F1
contents
Status &Bar F12
statusbar
Small Fonts
`hgag<
ggagg
agagg
ggagh
R...Y
S.YY...Y
.R5YR..
Y5R....}
_....
YYYY....
YR...}
YR......
.......Y
R......Y
Y.....Y
YR..Y
WaitStatus